﻿Public Class VirtualControllerFactory
    Implements IControllerFactory

    Public Function CreateController() As IController Implements IControllerFactory.CreateController
        Dim frm As frmVirtualController = New frmVirtualController()

        frm.Show()

        Return frm.Controller
    End Function

    Public ReadOnly Property Description() As String Implements IControllerFactory.Description
        Get
            Return "Virtual Emulated Controller"
        End Get
    End Property
End Class
